Uitvoerbare instructies schrijven

Een uitvoerbare instructie stelt een actie in werking. Een uitvoerbare instructie kan een methode of functie uitvoeren en lussen of vertakkingen in blokken programmacode maken. Uitvoerbare instructies bevatten vaak wiskundige of voorwaardelijke operators

In het volgende voorbeeld wordt een instructie For Each...Next uitgevoerd in alle cellen in het bereik MijnBereik op Blad1 van een actief Microsoft Excel-werkmap. De variabele c is een cel in de collectie van cellen die zich in MijnBereik bevindt.

Sub ApplyFormat()
Const limit As Integer = 33
For Each c In Worksheets("Blad1").Range("MijnBereik").Cells
    If c.Value > limit Then
        With c.Font
            .Bold = True
            .Italic = True
        End With
    End If
Next c
MsgBox "Klaar!"
End Sub

De instructie If...Then...Else toetst de waarde van de cel. Als de waarde hoger dan 33 is, wijst de instructie With de eigenschappen Bold en Italic toe aan het object Font van de cel. Instructies If...Then...Else worden afgesloten met End If.

De instructie With kan u typewerk besparen, omdat de instructies erin automatisch worden uitgevoerd op het object dat na het sleutelwoord With komt.

De instructie Next roept de volgende cel in de collectie van cellen in MijnBereik aan.

De functie MsgBox (waarmee een ingebouwd Visual Basic-dialoogvenster wordt weergegeven) geeft het bericht weer dat de procedure Sub is beδindigd.